FOR EACH wod_det WHERE wod_qty_chg > 0 AND wod_qty_all > 0 NO-LOCK:
    DISP wod_nbr wod_part 
         wod_qty_req 
         wod_qty_all
         wod_qty_pick 
         wod_qty_iss 
         wod_qty_chg 
         WITH WIDTH 80.


END.

/*wod_nbr ='W23A0015':*/
/*(wod_qty_chg > 0 AND wod_qty_all > 0 NO-LOCK:  */
